home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Atari Forever 4
/
Atari Forever 4.zip
/
Atari Forever 4.iso
/
PD_THEMA
/
CLI
/
SSL_CLI.1_4
/
BAK_DEL.BAT
< prev
next >
Wrap
DOS Batch File
|
1998-03-14
|
2KB
|
58 lines
@ECHO=OFF
WRAP=OFF
REM Copyright 1991: Stephan Slabihoud
CLS
CLEAR
ECHO ##############################################################################
ECHO # #
ECHO #=============> Batchdatei zum Löschen von beliebigen Dateien. <=============#
ECHO # #
ECHO # Es werden alle Verzeichnisse ab [Pfad] auf [Laufwerk:] durchsucht. #
ECHO # #
ECHO # Aufruf: BAK_DEL.BAT [Laufwerk:][Pfad][Maske] <[Laufwerk:][Pfad][Maske]...> #
ECHO # #
ECHO ##############################################################################
ECHO
WRAP=ON
IF%1= "" kein_parameter
:weiter
ECHO Bearbeite: %1
STREE %1
IFERR= 0 leerer_stack
:loop
ECHO Soll %E gelöscht werden? (Ja/Ende/Alle/*)
GETKEY
IFERR= 74 lösche
IFERR= 106 lösche
IFERR= 69 ende2
IFERR= 101 ende2
IFERR= 65 alle
IFERR= 97 alle
POP
IFERR= 0 ende
GOTO loop
:lösche
DEL %E
ECHO %L ...gelöscht !!!
GOTO loop
:alle
DEL %A
GOTO ende
:kein_parameter
ECHO Es wurde kein Parameter angegeben! Soll "\*.BAK" angenommen werden? (Ja/*)
ECHO
SET%1 "\*.BAK"
GETKEY
IFERR= 74 weiter
IFERR= 106 weiter
GOTO ende2
:leerer_stack
ECHO Keine Datei gefunden!
:ende
SHIFT
IFERR# 0 weiter
:ende2
ECHO
END